home *** CD-ROM | disk | FTP | other *** search
/ Private Casting / Casting One.bin / Docs / Interview.dir / Internal_14.ls < prev    next >
Encoding:
Text File  |  1997-01-22  |  536 b   |  17 lines
  1. on exitFrame
  2.   global chica
  3.   puppetSprite(3, 1)
  4.   puppetSprite(4, 1)
  5.   set the castNum of sprite 3 to the number of member chica
  6.   set the castNum of sprite 4 to the number of member (chica & "texto")
  7.   set the visible of sprite 3 to 1
  8.   set the visible of sprite 4 to 1
  9.   repeat with x = 11 to 18
  10.     if the number of member (chica & string(x - 10)) > 1 then
  11.       puppetSprite(x, 1)
  12.       set the castNum of sprite x to the number of member (chica & string(x - 10))
  13.       set the visible of sprite x to 1
  14.     end if
  15.   end repeat
  16. end
  17.